FireMonkey/Rad Studio XE2: How can I show the SaveDialog filter on OS X? [migrated]

Posted by Zoltan Karpati on Programmers See other posts from Programmers or by Zoltan Karpati
Published on 2012-10-20T19:52:58Z Indexed on 2012/10/20 23:19 UTC
Read the original article Hit count: 215

Filed under:
|
|

I created an (Delphi XE2) Firemonkey sample program which contains a TButton and a TSavedialog with two different filters. (The TSaveDialog component supports the Win32/Win64 and OS X platform.)

It works fine on Win32/Win64, but I don't now why it does not show the Savedialog filters on OS X (VirtualBox/OS X 10.7.x).

How can I get it to work on OS X ?

procedure TForm1.Button_SaveClick(Sender: TObject);
begin
  SaveDialog.Filter:='Format_1 (*.fmt1)|*.fmt1|Format_2 (*.fmt2)|*.fmt2';

  If Savedialog.Execute Then ShowMessage(SaveDialog.FileName+#13+'Selected filterindex: '+Inttostr(SaveDialog.FilterIndex));
end;

© Programmers or respective owner

Related posts about delphi

Related posts about osx